home *** CD-ROM | disk | FTP | other *** search
/ CD Classic 39 / CD CLASSIC #39 (1998).iso / EMPRESA / FACTPLUS / DISCO7 / PAGOS.XT_ / PAGOS.bin
Text File  |  1997-11-14  |  855b  |  43 lines

  1. <HTML>
  2. <TITLE><<TituloPagina()>></TITLE>
  3. <HEAD>
  4. <META HTTP-EQUIV="Expires" CONTENT="Mon, 06 Jan 1990 00:00:01 GMT">
  5. <SCRIPT>
  6.  
  7. function DetallePago( cFormaPago )
  8. {
  9.    document.cookie = "FormaPago=" + cFormaPago
  10.    if ( cFormaPago == "@H" )
  11.    {
  12.        location.href = "albaran.htm"
  13.    }
  14.    if ( cFormaPago == "@T" )
  15.    {
  16.        location.href = "tarjetas.htm"
  17.    }
  18.    if ( cFormaPago == "@C" )
  19.    {
  20.        location.href = "albaran.htm"
  21.    }
  22. }
  23. </SCRIPT>
  24. </HEAD>
  25.  
  26. <<FONDO(.T.)>>
  27. <center>
  28. <table border="4">
  29.      <tr>
  30.          <td><< logo () >></td>
  31.       </tr>
  32. </table>
  33. </center>
  34. <CENTER>
  35. <H2><<CartaNomEmp()>></H2>
  36. <H3><FONT COLOR="<<ColorEmpresa()>>">Seleccione la forma de pago</FONT></H3>
  37. </CENTER>
  38. <CENTER>
  39. <<FormasDePago( "#EE0077", "#FFFFFF", "#EE0077")>>
  40. <BR>
  41. </CENTER>
  42. <CENTER><<CartaDir()>></CENTER>
  43. </HTML>